Возвращает объект, представляющий программу, определенную для компонента. Только для чтения.

Дополнительные сведения
Свойство CodeModule возвращает значение Nothing, если компонент не имеет связанного с ним программного модуля.
Примечание. Объект CodePane представляет видимое окно программы. Конкретный компонент может иметь несколько объектов CodePane. Объект CodeModule представляет программу, определенную для компонента. Каждому компоненту может соответствовать только один объект CodeModule.

Пример
В следующем примере свойства CodeModule и CountOfLines используются для определения числа строк в указанном программном модуле.

Debug.Print Application.VBE.ActiveVBProject.VBComponents(6).CodeModule.CountOfLines